home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 April: Mac OS SDK / Dev.CD Apr 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Patches.a < prev    next >
Encoding:
Text File  |  1998-02-12  |  3.9 KB  |  155 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Patches.a
  3. ;
  4. ;    Contains:    Patch Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 8
  7. ;                Release:    Universal Interfaces 3.1
  8. ;
  9. ;    Copyright:    © 1994-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.  
  19.     IF &TYPE('__PATCHES__') = 'UNDEFINED' THEN
  20. __PATCHES__ SET 1
  21.  
  22.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  23.     include 'MacTypes.a'
  24.     ENDIF
  25.  
  26.     IF TARGET_OS_MAC THEN
  27.  
  28. kOSTrapType                        EQU        0
  29. kToolboxTrapType                EQU        1
  30. ; typedef SignedByte                     TrapType
  31.  
  32.  
  33. OSTrap                            EQU        0                    ; old name 
  34. ToolTrap                        EQU        1                    ; old name 
  35. ; 
  36. ;    GetTrapAddress and SetTrapAddress are obsolete and should not
  37. ;    be used. Always use NGetTrapAddress and NSetTrapAddress instead.
  38. ;    The old routines will not be supported for PowerPC apps.
  39. ;
  40.  
  41.     IF TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  42. ;
  43. ; pascal UniversalProcPtr GetTrapAddress(UInt16 trapNum)
  44. ;
  45.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  46.         ; parameters:
  47.         ;    trapNum         => D0
  48.         ; returns:
  49.         ;    UniversalProcPtr <= A0
  50.         _GetTrapAddress:    OPWORD    $A146
  51.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  52.         IMPORT_CFM_FUNCTION GetTrapAddress
  53.     ENDIF
  54.  
  55. ;
  56. ; pascal void SetTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  57. ;
  58.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  59.         ; parameters:
  60.         ;    trapAddr        => A0
  61.         ;    trapNum         => D0
  62.         _SetTrapAddress:    OPWORD    $A047
  63.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  64.         IMPORT_CFM_FUNCTION SetTrapAddress
  65.     ENDIF
  66.  
  67.     ENDIF
  68. ;
  69. ; pascal UniversalProcPtr GetOSTrapAddress(UInt16 trapNum)
  70. ;
  71.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  72.         ; parameters:
  73.         ;    trapNum         => D0
  74.         ; returns:
  75.         ;    UniversalProcPtr <= A0
  76.         _GetOSTrapAddress:    OPWORD    $A346
  77.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  78.         IMPORT_CFM_FUNCTION GetOSTrapAddress
  79.     ENDIF
  80.  
  81. ;
  82. ; pascal void SetOSTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  83. ;
  84.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  85.         ; parameters:
  86.         ;    trapAddr        => A0
  87.         ;    trapNum         => D0
  88.         _SetOSTrapAddress:    OPWORD    $A247
  89.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  90.         IMPORT_CFM_FUNCTION SetOSTrapAddress
  91.     ENDIF
  92.  
  93. ;
  94. ; pascal UniversalProcPtr GetToolTrapAddress(UInt16 trapNum)
  95. ;
  96.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  97.         ; parameters:
  98.         ;    trapNum         => D0
  99.         ; returns:
  100.         ;    UniversalProcPtr <= A0
  101.         _GetToolTrapAddress:    OPWORD    $A746
  102.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  103.         IMPORT_CFM_FUNCTION GetToolTrapAddress
  104.     ENDIF
  105.  
  106. ;
  107. ; pascal void SetToolTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  108. ;
  109.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  110.         ; parameters:
  111.         ;    trapAddr        => A0
  112.         ;    trapNum         => D0
  113.         _SetToolTrapAddress:    OPWORD    $A647
  114.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  115.         IMPORT_CFM_FUNCTION SetToolTrapAddress
  116.     ENDIF
  117.  
  118. ;
  119. ; pascal UniversalProcPtr GetToolboxTrapAddress(UInt16 trapNum)
  120. ;
  121.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  122.         ; parameters:
  123.         ;    trapNum         => D0
  124.         ; returns:
  125.         ;    UniversalProcPtr <= A0
  126.         _GetToolboxTrapAddress:    OPWORD    $A746
  127.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  128.         IMPORT_CFM_FUNCTION GetToolboxTrapAddress
  129.     ENDIF
  130.  
  131. ;
  132. ; pascal void SetToolboxTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  133. ;
  134.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  135.         ; parameters:
  136.         ;    trapAddr        => A0
  137.         ;    trapNum         => D0
  138.         _SetToolboxTrapAddress:    OPWORD    $A647
  139.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  140.         IMPORT_CFM_FUNCTION SetToolboxTrapAddress
  141.     ENDIF
  142.  
  143.     IF TARGET_CPU_PPC THEN
  144. ;
  145. ; pascal UniversalProcHandle GetTrapVector(UInt16 trapNumber)
  146. ;
  147.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  148.         IMPORT_CFM_FUNCTION GetTrapVector
  149.     ENDIF
  150.  
  151.     ENDIF    ; TARGET_CPU_PPC
  152.     ENDIF    ; TARGET_OS_MAC
  153.     ENDIF ; __PATCHES__ 
  154.  
  155.